home *** CD-ROM | disk | FTP | other *** search
/ Micom Basic 1995 October / CD [BM9510].bin / programs / lotus / lotus001.dsk / MACROS / PRNBATCH.SMM < prev    next >
Encoding:
INI File  |  1994-08-11  |  36.8 KB  |  2,159 lines
  1. [ver]
  2.     4
  3. [sty]
  4.     jmacro.sty
  5. [files]
  6. [charset]
  7.     82
  8.     SHIFTJIS (Windows)
  9. [revisions]
  10.     0
  11. [prn]
  12.     PostScript Printer
  13. [port]
  14.     LPT1:
  15. [lang]
  16.     1
  17. [fldnames]
  18.     ╠¿░┘─▐1
  19.     ╠¿░┘─▐2
  20.     ╠¿░┘─▐3
  21.     ╠¿░┘─▐4
  22.     ╠¿░┘─▐5
  23.     ╠¿░┘─▐6
  24.     ╠¿░┘─▐7
  25.     ╠¿░┘─▐8
  26. [desc]
  27.     òíÉö╠º▓┘é╠ê≤ìⁿé╞ê≤ìⁿÄ₧ìÅé╠ÄwÆΦ
  28.     Lotus WPD Technical Support
  29.     Advanced
  30.     Call Backs, Global Arrays
  31.     noautorun
  32.     775429551
  33.     94
  34.     677020248
  35.     3532
  36.     10
  37.     1245
  38.     9186
  39.     27
  40.     27
  41.     Call Backs, Runlater, Global Aray
  42.     
  43.     
  44.     
  45.     
  46.     
  47.     0
  48. [fopts]
  49.     0
  50.     1
  51.     0
  52.     0
  53. [lnopts]
  54.     2
  55.     Body Text
  56.     1
  57. [docopts]
  58.     5
  59.     2
  60. [GramStyle]
  61.     
  62. [lay]
  63.     Standard
  64.     513
  65.     [rght]
  66.         15840
  67.         12240
  68.         1
  69.         1440
  70.         1440
  71.         1
  72.         1972
  73.         1440
  74.         0
  75.         1
  76.         0
  77.         1
  78.         0
  79.         2
  80.         1
  81.         1440
  82.         10800
  83.         9
  84.         1
  85.         720
  86.         1
  87.         1440
  88.         1
  89.         2160
  90.         1
  91.         2880
  92.         1
  93.         3690
  94.         1
  95.         4815
  96.         1
  97.         5925
  98.         1
  99.         7200
  100.         1
  101.         8535
  102.     [hrght]
  103.     [lyfrm]
  104.         1
  105.         11200
  106.         0
  107.         0
  108.         12240
  109.         1972
  110.         0
  111.         1
  112.         3
  113.         1 0 0 0 0 0 0
  114.         0
  115.         0
  116.         1
  117.     [frmlay]
  118.         1972
  119.         12240
  120.         1
  121.         1440
  122.         0
  123.         1
  124.         792
  125.         1440
  126.         0
  127.         1
  128.         0
  129.         1
  130.         1
  131.         0
  132.         1
  133.         1440
  134.         10800
  135.         0
  136.     [txt]
  137. @âëâxâï@<+B><:da<*!><* >>
  138.  
  139. @âëâxâï@<+B>Peyton McManus
  140.  
  141. @âëâxâï@<+B>Page <:P10,0,> of <:X3,16384;NumPages>11<:X~3,16384;NumPages>
  142.  
  143. @Body Text@<+B>
  144.  
  145. @Body Text@<+B>
  146.  
  147. @Body Text@
  148. >
  149.     [frght]
  150.     [lyfrm]
  151.         1
  152.         13248
  153.         0
  154.         14400
  155.         12240
  156.         15840
  157.         0
  158.         1
  159.         3
  160.         1 0 0 0 0 0 0
  161.         0
  162.         0
  163.         2
  164.     [frmlay]
  165.         15840
  166.         12240
  167.         1
  168.         1440
  169.         90
  170.         1
  171.         14472
  172.         1440
  173.         0
  174.         1
  175.         0
  176.         1
  177.         1
  178.         0
  179.         1
  180.         1440
  181.         10800
  182.         0
  183.     [txt]
  184. <+B><:f,1û╛Æ⌐,>Revision Number <:da<*&><* >>
  185.  
  186. <+B><:f,1û╛Æ⌐,><:Da  > <:b<* >><:f>
  187.  
  188. @Body Text@<+B>
  189.  
  190. >
  191. [elay]
  192. [l1]
  193.     0
  194. [pg]
  195.     1
  196.     52 0 19 0 0 0 0 65535 2 Standard    65535 0 0    0 0 0 0 0 0 0 65535 0 0 65535 0 0 0 0 0
  197. [edoc]
  198. <:f,1û╛Æ⌐,>Declare GetFlag(p1)
  199.  
  200. <:f,1û╛Æ⌐,>Declare SetFlag(p1,p2)
  201.  
  202. <:f,1û╛Æ⌐,>Declare SaveSettings(p1,p2,p3)
  203.  
  204. <:f,1û╛Æ⌐,>Define    SetTrue()        SetDlgITemText(Hdlg,%1,"True")
  205.  
  206. <:f,1û╛Æ⌐,>Define    SetFalse()        SetDlgITemText(Hdlg,%1,0)
  207.  
  208. <:f,1û╛Æ⌐,>Define GetItem()        GetDlgItemText(Hdlg,%1)
  209.  
  210. <:f,1û╛Æ⌐,>Define    GetPerm()        GetGlobalArray$("perm",%1)
  211.  
  212. <:f,1û╛Æ⌐,>Define    GetTemp()        GetGlobalArray$("temp",%1)
  213.  
  214. <:f,1û╛Æ⌐,>Define    Hour_up        67
  215.  
  216. <:f,1û╛Æ⌐,>Define    Minute_up        66
  217.  
  218. <:f,1û╛Æ⌐,>Define    Hour_down        57
  219.  
  220. <:f,1û╛Æ⌐,>Define    Minute_down        56
  221.  
  222. <:f,1û╛Æ⌐,>define    VK_LBUTTON        0x001
  223.  
  224. <:f,1û╛Æ⌐,>Define    EnableWindow()    DllCall("User,EnableWindow,AHA",%1,%2)
  225.  
  226. <:f,1û╛Æ⌐,>Define    SetFocus()        DllCall("User,SetFocus,HH",%1)
  227.  
  228. <:f,1û╛Æ⌐,>define    FindWindow()     DllCall("user,FindWindow,HCC", %1, %2)
  229.  
  230. <:f,1û╛Æ⌐,>define     isiconic(hWnd)     DLLCall("user,isiconic,HA", %1)
  231.  
  232. <:f,1û╛Æ⌐,>
  233.  
  234. <:f,1û╛Æ⌐,>
  235.  
  236. <:f,1û╛Æ⌐,>
  237.  
  238. <:f,1û╛Æ⌐,>define GetActiveWindow()    DllCall("user,GetActiveWindow,H")
  239.  
  240. <:f,1û╛Æ⌐,>define SetWindowText()    DllCall("user,SetWindowText,IHC", %1, %2)
  241.  
  242. <:f,1û╛Æ⌐,>define TitleBarMsg()    SetWindowText(GetActiveWindow(), %1)
  243.  
  244. <:f,1û╛Æ⌐,>define GetWindowText()    DllCall("user,GetWindowText,HHFH", %1, %2, %3)
  245.  
  246. <:f,1û╛Æ⌐,>
  247.  
  248. <:f,1û╛Æ⌐,>
  249.  
  250. <:f,1û╛Æ⌐,>
  251.  
  252. <:f,1û╛Æ⌐,>
  253.  
  254. <:f,1û╛Æ⌐,>
  255.  
  256. @╠º▌╕╝«▌@<:><:><:f,1û╛Æ⌐,>Function Multiple()
  257.  
  258. <:f,1û╛Æ⌐,>IF IsNewWave()
  259.  
  260. <:f,1û╛Æ⌐,>    Message("<:f,1û╛Æ⌐,>NewWaveé┼é═é▒é╠â}âNâìé═ùLî°é┼é═éáéΦé▄é╣é±í")
  261.  
  262. <:f,1û╛Æ⌐,>    Exit Function
  263.  
  264. <:f,1û╛Æ⌐,>ENDIF
  265.  
  266. <:f,1û╛Æ⌐,>if GetOpenFileCount() = 9
  267.  
  268. <:f,1û╛Æ⌐,>    message("âtâ@âCâïé≡éPé┬ê╚ÅπâNâìü[âYé╡é─é⌐éτÄ└ìsé╡é─é¡é╛é│éóüB")
  269.  
  270. <:f,1û╛Æ⌐,>    exit function
  271.  
  272. <:f,1û╛Æ⌐,>endif
  273.  
  274. <:f,1û╛Æ⌐,>X = 1
  275.  
  276. <:f,1û╛Æ⌐,>AllocGlobalVar("Perm",200)
  277.  
  278. <:f,1û╛Æ⌐,>SetGlobalArray("Perm",1,1)
  279.  
  280. <:f,1û╛Æ⌐,>AllocGlobalVar("Time"2) ' This is the Time Global
  281.  
  282. <:f,1û╛Æ⌐,>SetGlobalArray("time",1,0)
  283.  
  284. <:f,1û╛Æ⌐,>SetGlobalArray("time",2,0)
  285.  
  286. <:f,1û╛Æ⌐,>Mac=GetRunningMacroFile$()
  287.  
  288. <:f,1û╛Æ⌐,>doc=getdocpath$()
  289.  
  290. <:f,1û╛Æ⌐,>Filledit(9001,"{doc}*.s?m")
  291.  
  292. <:f,1û╛Æ⌐,>Filledit(60,1)
  293.  
  294. <:f,1û╛Æ⌐,>SetDlgCallBack(54,"{Mac}!Time")
  295.  
  296. <:f,1û╛Æ⌐,>SetDlgCallBack(51,"{Mac}!Options")
  297.  
  298. <:f,1û╛Æ⌐,>Box=dialogbox(".","Select")
  299.  
  300. <:#240,9360><:f,1û╛Æ⌐,>if Box<<<;>1
  301.  
  302. <:#240,9360><:f,1û╛Æ⌐,>    FreeGlobalVar("Time")
  303.  
  304. <:#240,9360><:f,1û╛Æ⌐,>    FreeGlobalVar("Perm")
  305.  
  306. <:#240,9360><:f,1û╛Æ⌐,>    FreeGlobalVar("Temp")
  307.  
  308. <:#240,9360><:f,1û╛Æ⌐,>    Exit Function
  309.  
  310. <:#240,9360><:f,1û╛Æ⌐,>Endif
  311.  
  312. <:#240,9360><:f,1û╛Æ⌐,>Files=GetDialogField$(8001)
  313.  
  314. <:#240,9360><:f,1û╛Æ⌐,>Call Loadfiles(Files)
  315.  
  316. <:#240,9360><:f,1û╛Æ⌐,>Radio1=getdialogfield$(60)
  317.  
  318. <:#240,9360><:f,1û╛Æ⌐,>Radio2=Getdialogfield$(61)
  319.  
  320. <:#240,9360><:f,1û╛Æ⌐,>If {Radio2}
  321.  
  322. <:#240,9360><:f,1û╛Æ⌐,>    hour=GetGlobalArray$("time",1)
  323.  
  324. <:#240,9360><:f,1û╛Æ⌐,>    Minute=GetGlobalArray$("time",2)
  325.  
  326. <:#240,9360><:f,1û╛Æ⌐,>        IF Hour<;>0 or Minute<;>0
  327.  
  328. <:#240,9360><:f,1û╛Æ⌐,>            Runlater("{Mac}!Go","{hour}:{Minute}")
  329.  
  330. <:#240,9360><:f,1û╛Æ⌐,>            message("{Hour}Ä₧è╘{Minute}ò¬îπé╔ê≤ìⁿé≡èJÄné╡é▄é╖í")
  331.  
  332. <:#240,9360><:f,1û╛Æ⌐,>        Else
  333.  
  334. <:#240,9360><:f,1û╛Æ⌐,>            Message("<:f,1û╛Æ⌐,>ê≤ìⁿèJÄnÄ₧è╘é¬É▌ÆΦé│éΩé─éóé▄é╣é±í 
  335. é╖é«é╔ê≤ìⁿé≡èJÄné╡é▄é╖í")
  336.  
  337. <:#240,9360><:f,1û╛Æ⌐,>            Call Go()
  338.  
  339. <:#240,9360><:f,1û╛Æ⌐,>        Endif
  340.  
  341. <:#240,9360><:f,1û╛Æ⌐,>Elseif {Radio1}
  342.  
  343. <:#240,9360><:f,1û╛Æ⌐,>    Call Go()
  344.  
  345. <:#240,9360><:f,1û╛Æ⌐,>Endif
  346.  
  347. <:#240,9360><:f,1û╛Æ⌐,>End Function
  348.  
  349. <:#240,9360><:f,1û╛Æ⌐,>
  350.  
  351. <:#240,9360><:f,1û╛Æ⌐,>
  352.  
  353. <:#240,9360><:f,1û╛Æ⌐,>
  354.  
  355. @╠º▌╕╝«▌@<:#240,9360><:><:><:><:><:f,1û╛Æ⌐,>Function LoadFiles(Files)
  356.  
  357. <:#240,9360><:f,1û╛Æ⌐,>'SingleStep(1)
  358.  
  359. <:#240,9360><:f,1û╛Æ⌐,>From=1
  360.  
  361. <:#240,9360><:f,1û╛Æ⌐,>Finish=9999
  362.  
  363. <:#240,9360><:f,1û╛Æ⌐,>Flag=1
  364.  
  365. <:#240,9360><:f,1û╛Æ⌐,>Copies=1
  366.  
  367. <:#240,9360><:f,1û╛Æ⌐,>x=1
  368.  
  369. <:#240,9360><:f,1û╛Æ⌐,>dir=getcurrentdir$()
  370.  
  371. <:#240,9360><:f,1û╛Æ⌐,>Total=GetGlobalArray$("Perm",1)
  372.  
  373. <:#240,9360><:f,1û╛Æ⌐,>    Dim LStorage(total)
  374.  
  375. <:#240,9360><:f,1û╛Æ⌐,>        For T=2 to ToTal
  376.  
  377. <:#240,9360><:f,1û╛Æ⌐,>            LStorage(t)=GetGlobalArray$("Perm",t)
  378.  
  379. <:#240,9360><:f,1û╛Æ⌐,>        Next
  380.  
  381. <:#240,9360><:f,1û╛Æ⌐,>While (1)
  382.  
  383. <:#240,9360><:f,1û╛Æ⌐,>        Filename=Strfield$(Files,x," ")
  384.  
  385. <:#240,9360><:f,1û╛Æ⌐,>        if Len(filename)<;>3
  386.  
  387. <:#240,9360><:f,1û╛Æ⌐,>            Found=ArraySearch(&LStorage,Filename,2,"^")
  388.  
  389. <:#240,9360><:f,1û╛Æ⌐,>            IF Found<;>0
  390.  
  391. <:#240,9360><:f,1û╛Æ⌐,>                Temp=LStorage(Found)
  392.  
  393. <:#240,9360><:f,1û╛Æ⌐,>            Else
  394.  
  395. <:#240,9360><:f,1û╛Æ⌐,>        temp="{dir}^{Filename}^{Copies}^{From}^{Finish}^{Flag}"
  396.  
  397. <:#240,9360><:f,1û╛Æ⌐,>            Endif        
  398.  
  399. <:#240,9360><:f,1û╛Æ⌐,>            SetGlobalArray("perm",x+1,Temp)
  400.  
  401. <:#240,9360><:f,1û╛Æ⌐,>            x=x+1
  402.  
  403. <:#240,9360><:f,1û╛Æ⌐,>        Else
  404.  
  405. <:#240,9360><:f,1û╛Æ⌐,>            Break
  406.  
  407. <:#240,9360><:f,1û╛Æ⌐,>        Endif
  408.  
  409. <:#240,9360><:f,1û╛Æ⌐,>Wend
  410.  
  411. <:#240,9360><:f,1û╛Æ⌐,>SetGlobalArray("Perm",1,x)
  412.  
  413. <:#240,9360><:f,1û╛Æ⌐,>End Function
  414.  
  415. <:#240,9360><:f,1û╛Æ⌐,>
  416.  
  417. <:#240,9360><:f,1û╛Æ⌐,>
  418.  
  419. @╠º▌╕╝«▌@<:#240,9360><:><:><:f,1û╛Æ⌐,>Function Options(Hdlg,Id,Text)
  420.  
  421. <:#240,9360><:f,1û╛Æ⌐,>Files=GetDlgItemText(Hdlg,8001)
  422.  
  423. <:#240,9360><:f,1û╛Æ⌐,>If Len(files) <<3
  424.  
  425. <:#240,9360><:f,1û╛Æ⌐,>    Message<:f,1û╛Æ⌐,>("ɵé╔éóé¡é┬é⌐âtâ@âCâïé≡æIæ≡é╡é─é¡é╛é│éóí")
  426.  
  427. <:#240,9360><:f,1û╛Æ⌐,>    Exit Function
  428.  
  429. <:#240,9360><:f,1û╛Æ⌐,>Endif
  430.  
  431. <:#240,9360><:f,1û╛Æ⌐,>
  432.  
  433. <:#240,9360><:f,1û╛Æ⌐,>Call Loadfiles(Files)
  434.  
  435. <:#240,9360><:f,1û╛Æ⌐,>MaxPerm=GetGlobalArray$("Perm",1)
  436.  
  437. <:#240,9360><:f,1û╛Æ⌐,>AllocGlobalVar("Temp",MaxPerm)
  438.  
  439. <:#240,9360><:f,1û╛Æ⌐,>AllocGlobalVar ("Counter",1)
  440.  
  441. <:#240,9360><:f,1û╛Æ⌐,>SetGlobalVar("Counter",2)
  442.  
  443. <:#240,9360><:f,1û╛Æ⌐,>
  444.  
  445. <:#240,9360><:f,1û╛Æ⌐,>For x=2 to Maxperm
  446.  
  447. <:#240,9360><:f,1û╛Æ⌐,>    Data=GetGlobalArray$("Perm",x)
  448.  
  449. <:#240,9360><:f,1û╛Æ⌐,>    SetGlobalArray("temp",x,Data)
  450.  
  451. <:#240,9360><:f,1û╛Æ⌐,>Next    
  452.  
  453. <:#240,9360><:f,1û╛Æ⌐,>Call SetFirst()
  454.  
  455. <:#240,9360><:f,1û╛Æ⌐,>Mac=GetRunningMacroFile$()
  456.  
  457. <:#240,9360><:f,1û╛Æ⌐,>FillEdit(50,1)
  458.  
  459. <:#240,9360><:f,1û╛Æ⌐,>SetDlgCallBack(8000,"{mac}!Numbering")
  460.  
  461. <:#240,9360><:f,1û╛Æ⌐,>SetDlgCallBack(8001,"{MAc}!Numbering")
  462.  
  463. <:#240,9360><:f,1û╛Æ⌐,>SetDlgCallBack(56,"{mac}!NextFile")
  464.  
  465. <:#240,9360><:f,1û╛Æ⌐,>SetDlgCallBack(57,"{mac}!SaveSettings")
  466.  
  467. <:#240,9360><:f,1û╛Æ⌐,>EnableWindow(Hdlg,0)
  468.  
  469. <:#240,9360><:f,1û╛Æ⌐,>Box=dialogbox(".","Options")
  470.  
  471. <:#240,9360><:f,1û╛Æ⌐,>EnableWindow(Hdlg,1)
  472.  
  473. <:#240,9360><:f,1û╛Æ⌐,>SetFocus(Hdlg)
  474.  
  475. <:#240,9360><:f,1û╛Æ⌐,>if Box = 1
  476.  
  477. <:#240,9360><:f,1û╛Æ⌐,>Call TempToPerm() ' if ok swap temp to perm
  478.  
  479. <:#240,9360><:f,1û╛Æ⌐,>Endif
  480.  
  481. <:#240,9360><:f,1û╛Æ⌐,>FreeGlobalVar("Counter")
  482.  
  483. <:#240,9360><:f,1û╛Æ⌐,>End Function
  484.  
  485. <:#240,9360><:f,1û╛Æ⌐,>
  486.  
  487. <:#240,9360><:><:><:f,1û╛Æ⌐,>
  488.  
  489. @╠º▌╕╝«▌@<:#240,9360><:f,1û╛Æ⌐,>Function SaveSettings(Hdlg,Id,Text)
  490.  
  491. <:#240,9360><:f,1û╛Æ⌐,>Lcount=GetGlobalVar$("Counter")
  492.  
  493. <:#240,9360><:f,1û╛Æ⌐,>From=GetDlgItemText(Hdlg,8000)
  494.  
  495. <:#240,9360><:f,1û╛Æ⌐,>Finish=GetDlgItemText(Hdlg,8001)
  496.  
  497. <:#240,9360><:f,1û╛Æ⌐,>Copies=GetdlgItemText(Hdlg,8002)
  498.  
  499. <:#240,9360><:f,1û╛Æ⌐,>Flag=GetFlag(Hdlg)
  500.  
  501. <:#240,9360><:f,1û╛Æ⌐,>Dir=StrField$(GetTemp(Lcount),1,"^")
  502.  
  503. <:#240,9360><:f,1û╛Æ⌐,>Name=StrField$(GetTemp(Lcount),2,"^")
  504.  
  505. <:#240,9360><:f,1û╛Æ⌐,>SaveBack="{Dir}^{Name}^{copies}^{From}^{Finish}^{Flag}"
  506.  
  507. <:#240,9360><:f,1û╛Æ⌐,>'(SaveBack)
  508.  
  509. <:#240,9360><:f,1û╛Æ⌐,>SetGlobalArray("Temp",Lcount,SaveBack)
  510.  
  511. <:#240,9360><:f,1û╛Æ⌐,>End Function
  512.  
  513. <:#240,9360><:f,1û╛Æ⌐,>
  514.  
  515. @╠º▌╕╝«▌@<:#240,9360><:f,1û╛Æ⌐,>Function NextFile(Hdlg,id,Text)
  516.  
  517. <:#240,9360><:f,1û╛Æ⌐,>SaveSettings(Hdlg,id,Text)
  518.  
  519. <:#240,9360><:f,1û╛Æ⌐,>LCount=GetGlobalVar$("counter")
  520.  
  521. <:#240,9360><:f,1û╛Æ⌐,>Max=GetGlobalArray$("Perm",1)
  522.  
  523. <:#240,9360><:f,1û╛Æ⌐,>If Lcount<<Max
  524.  
  525. <:#240,9360><:f,1û╛Æ⌐,>    Lcount=Lcount+1
  526.  
  527. <:#240,9360><:f,1û╛Æ⌐,>Else
  528.  
  529. <:#240,9360><:f,1û╛Æ⌐,>    Lcount=2
  530.  
  531. <:#240,9360><:f,1û╛Æ⌐,>Endif
  532.  
  533. <:#240,9360><:f,1û╛Æ⌐,>ShowStat=Lcount - 1
  534.  
  535. <:#240,9360><:f,1û╛Æ⌐,>ShowMax=Max - 1
  536.  
  537. <:#240,9360><:f,1û╛Æ⌐,>    Status="File {ShowStat} of {ShowMax}"
  538.  
  539. <:#240,9360><:f,1û╛Æ⌐,>    Name2=UCase$(StrField$(GetTemp(Lcount),2,"^"))
  540.  
  541. <:#240,9360><:f,1û╛Æ⌐,>    Flag=StrField$(GetTemp(Lcount),6,"^")
  542.  
  543. <:#240,9360><:f,1û╛Æ⌐,>    From=StrField$(GetTemp(Lcount),4,"^")
  544.  
  545. <:#240,9360><:f,1û╛Æ⌐,>    fin=StrField$(GetTemp(Lcount),5,"^")
  546.  
  547. <:#240,9360><:f,1û╛Æ⌐,>    Copies=StrField$(GetTemp(Lcount),3,"^")
  548.  
  549. <:#240,9360><:f,1û╛Æ⌐,>    SetFlag(Hdlg,Flag)
  550.  
  551. <:#240,9360><:f,1û╛Æ⌐,>    SetDlgItemText(Hdlg,1002,"{Name2}")
  552.  
  553. <:#240,9360><:f,1û╛Æ⌐,>    SetDlgItemText(Hdlg,8000,from)
  554.  
  555. <:#240,9360><:f,1û╛Æ⌐,>    SetDlgITemText(Hdlg,8001,Fin)
  556.  
  557. <:#240,9360><:f,1û╛Æ⌐,>    SetDlgItemText(Hdlg,8002,Copies)
  558.  
  559. <:#240,9360><:f,1û╛Æ⌐,>    SetDlgItemText(Hdlg,1003,Status)
  560.  
  561. <:#240,9360><:f,1û╛Æ⌐,>SetGlobalVar("counter",lcount)
  562.  
  563. <:#240,9360><:f,1û╛Æ⌐,>End Function
  564.  
  565. <:#240,9360><:f,1û╛Æ⌐,>
  566.  
  567. @╠º▌╕╝«▌@<:#240,9360><:><:><:f,1û╛Æ⌐,>Function SetFlag(Hdlg,Flag)
  568.  
  569. <:#240,9360><:f,1û╛Æ⌐,>mask = 1
  570.  
  571. <:#240,9360><:f,1û╛Æ⌐,>for i = 1 to 11
  572.  
  573. <:#240,9360><:f,1û╛Æ⌐,>    If Flag & Mask
  574.  
  575. <:#240,9360><:f,1û╛Æ⌐,>        SetDlgItemText(hDlg, 59 + i, 1)
  576.  
  577. <:#240,9360><:f,1û╛Æ⌐,>    Else
  578.  
  579. <:#240,9360><:f,1û╛Æ⌐,>        SetDlgItemText(Hdlg,59 + i, 0)
  580.  
  581. <:#240,9360><:f,1û╛Æ⌐,>    Endif
  582.  
  583. <:#240,9360><:f,1û╛Æ⌐,>    mask = mask * 2
  584.  
  585. <:#240,9360><:f,1û╛Æ⌐,>If I=3 
  586.  
  587. <:#240,9360><:f,1û╛Æ⌐,>    Mask=Mask*2
  588.  
  589. <:#240,9360><:f,1û╛Æ⌐,>Endif
  590.  
  591. <:#240,9360><:f,1û╛Æ⌐,>next
  592.  
  593. <:#240,9360><:f,1û╛Æ⌐,>If (GetDlgItemText(Hdlg,60)=0) ' if all is no
  594.  
  595. <:#240,9360><:f,1û╛Æ⌐,>    SetDlgItemText(Hdlg,90,1)
  596.  
  597. <:#240,9360><:f,1û╛Æ⌐,>Endif
  598.  
  599. <:#240,9360><:f,1û╛Æ⌐,>if (((GetDlgItemText(Hdlg,68)=0) and (GetDlgItemText(Hdlg,69)=0)))
  600.  
  601. <:#240,9360><:f,1û╛Æ⌐,>    SetdlgItemText(Hdlg,50,1)
  602.  
  603. <:#240,9360><:f,1û╛Æ⌐,>Else
  604.  
  605. <:#240,9360><:f,1û╛Æ⌐,>    SetDlgItemText(Hdlg,50,0)    
  606.  
  607. <:#240,9360><:f,1û╛Æ⌐,>Endif
  608.  
  609. <:#240,9360><:f,1û╛Æ⌐,>End Function
  610.  
  611. <:#240,9360><:f,1û╛Æ⌐,>
  612.  
  613. @╠º▌╕╝«▌@<:#240,9360><:f,1û╛Æ⌐,>Function SetFirst()
  614.  
  615. <:#240,9360><:f,1û╛Æ⌐,>Name=Ucase$(Strfield$(GetTemp(2),2,"^"))
  616.  
  617. <:#240,9360><:f,1û╛Æ⌐,>flag=StrField$(GetTemp(2),6,"^")
  618.  
  619. <:#240,9360><:f,1û╛Æ⌐,>From=Strfield$(GetTemp(2),4,"^")
  620.  
  621. <:#240,9360><:f,1û╛Æ⌐,>Finish=Strfield$(GetTemp(2),5,"^")
  622.  
  623. <:#240,9360><:f,1û╛Æ⌐,>Copies=StrField$(GetTemp(2),3,"^")
  624.  
  625. <:#240,9360><:f,1û╛Æ⌐,>Max=GetGlobalArray$("Perm",1) - 1
  626.  
  627. <:#240,9360><:f,1û╛Æ⌐,>Status="File 1 of {Max}"
  628.  
  629. <:#240,9360><:f,1û╛Æ⌐,>Filledit(1002,Name)
  630.  
  631. <:#240,9360><:f,1û╛Æ⌐,>Filledit(1003,Status)
  632.  
  633. <:#240,9360><:f,1û╛Æ⌐,>Filledit(8000,From)
  634.  
  635. <:#240,9360><:f,1û╛Æ⌐,>Filledit(8001,Finish)
  636.  
  637. <:#240,9360><:f,1û╛Æ⌐,>Filledit(8002,Copies)
  638.  
  639. <:#240,9360><:f,1û╛Æ⌐,>mask = 1
  640.  
  641. <:#240,9360><:f,1û╛Æ⌐,>for i = 1 to 11
  642.  
  643. <:#240,9360><:f,1û╛Æ⌐,>    Filledit(59 + i, flag & mask)
  644.  
  645. <:#240,9360><:f,1û╛Æ⌐,>    mask = mask * 2
  646.  
  647. <:#240,9360><:f,1û╛Æ⌐,>If I=3 
  648.  
  649. <:#240,9360><:f,1û╛Æ⌐,>    Mask=Mask*2
  650.  
  651. <:#240,9360><:f,1û╛Æ⌐,>Endif
  652.  
  653. <:#240,9360><:f,1û╛Æ⌐,>next
  654.  
  655. <:#240,9360><:f,1û╛Æ⌐,>End Function
  656.  
  657. <:#240,9360><:f,1û╛Æ⌐,>
  658.  
  659. @╠º▌╕╝«▌@<:#240,9360><:f,1û╛Æ⌐,>Function GetFlag(Hdlg)
  660.  
  661. <:#240,9360><:f,1û╛Æ⌐,>Mask=1
  662.  
  663. <:#240,9360><:f,1û╛Æ⌐,>SumFlag=0
  664.  
  665. <:#240,9360><:f,1û╛Æ⌐,>For x=60 to 70
  666.  
  667. <:#240,9360><:f,1û╛Æ⌐,>    SumFlag=SumFlag+(GetItem(x)*Mask)
  668.  
  669. <:#240,9360><:f,1û╛Æ⌐,>    Mask=Mask*2
  670.  
  671. <:#240,9360><:f,1û╛Æ⌐,>if x=62
  672.  
  673. <:#240,9360><:f,1û╛Æ⌐,>        mask=Mask*2
  674.  
  675. <:#240,9360><:f,1û╛Æ⌐,>Endif
  676.  
  677. <:#240,9360><:f,1û╛Æ⌐,>    
  678.  
  679. <:#240,9360><:f,1û╛Æ⌐,>Next
  680.  
  681. <:#240,9360><:f,1û╛Æ⌐,>Return SumFlag;
  682.  
  683. <:#240,9360><:f,1û╛Æ⌐,>End Function
  684.  
  685. <:#240,9360><:f,1û╛Æ⌐,>
  686.  
  687. @╠º▌╕╝«▌@<:#240,9360><:f,1û╛Æ⌐,>Function Numbering(Hdlg,Id,Text)
  688.  
  689. <:#240,9360><:f,1û╛Æ⌐,>SetDlgItemText(Hdlg,60,0)
  690.  
  691. <:#240,9360><:f,1û╛Æ⌐,>SetDlgItemText(Hdlg,90,True)
  692.  
  693. <:#240,9360><:f,1û╛Æ⌐,>End Function
  694.  
  695. <:#240,9360><:f,1û╛Æ⌐,>
  696.  
  697. @╠º▌╕╝«▌@<:#240,9360><:f,1û╛Æ⌐,>Function TempToPerm()
  698.  
  699. <:#240,9360><:f,1û╛Æ⌐,>' This will dump the contents of the Temp Array into the Perm Array.
  700.  
  701. <:#240,9360><:f,1û╛Æ⌐,>Total=GetGlobalarray$("Perm",1)
  702.  
  703. <:#240,9360><:f,1û╛Æ⌐,>FreeGlobalVar("Perm")
  704.  
  705. <:#240,9360><:f,1û╛Æ⌐,>AllocGlobalVar("Perm",200)
  706.  
  707. <:#240,9360><:f,1û╛Æ⌐,>SetGlobalArray("Perm",1,Total)
  708.  
  709. <:#240,9360><:f,1û╛Æ⌐,>For X= 2 to Total
  710.  
  711. <:#240,9360><:f,1û╛Æ⌐,>    Data=GetGlobalArray$("Temp",x)
  712.  
  713. <:#240,9360><:f,1û╛Æ⌐,>    SetGlobalArray("Perm",x,Data)
  714.  
  715. <:#240,9360><:f,1û╛Æ⌐,>Next
  716.  
  717. <:#240,9360><:f,1û╛Æ⌐,>FreeGlobalVar("Temp")
  718.  
  719. <:#240,9360><:f,1û╛Æ⌐,>End function
  720.  
  721. <:#240,9360><:f,1û╛Æ⌐,>For T=1 to Total
  722.  
  723. <:#240,9360><:f,1û╛Æ⌐,>    
  724.  
  725. <:#240,9360><:f,1û╛Æ⌐,>
  726.  
  727. <:#240,9360><:f,1û╛Æ⌐,>'  This is the time box to allow user to set print time.
  728.  
  729. <:#240,9360><:f,1û╛Æ⌐,>'
  730.  
  731. @╠º▌╕╝«▌@<:#240,9360><:><:><:f,1û╛Æ⌐,>Function Time(hdlg,id,text)
  732.  
  733. <:#240,9360><:f,1û╛Æ⌐,>'singlestep(1)
  734.  
  735. <:#240,9360><:f,1û╛Æ⌐,>SetDlgItemText(Hdlg,60,0)
  736.  
  737. <:#240,9360><:f,1û╛Æ⌐,>SetDlgItemText(Hdlg,61,True)
  738.  
  739. <:#240,9360><:f,1û╛Æ⌐,>T = 0
  740.  
  741. <:#240,9360><:f,1û╛Æ⌐,>Mac=GetRunningMacroFile$()
  742.  
  743. <:#240,9360><:f,1û╛Æ⌐,>Today=NOW()
  744.  
  745. <:#240,9360><:f,1û╛Æ⌐,>Time= FormatTime$(Today,3)
  746.  
  747. <:#240,9360><:f,1û╛Æ⌐,>Date=FormatDate$(Today,"f")
  748.  
  749. <:#240,9360><:f,1û╛Æ⌐,>Filledit(1000,Time)
  750.  
  751. <:#240,9360><:f,1û╛Æ⌐,>Filledit(1006,Date)
  752.  
  753. <:#240,9360><:f,1û╛Æ⌐,>Sec=(GetGlobalArray$("time",1) * 3600) + (GetGlobalArray$("time",2) * 60)
  754.  
  755. <:#240,9360><:f,1û╛Æ⌐,>Sec = Sec + Today
  756.  
  757. <:#240,9360><:f,1û╛Æ⌐,>Filledit(1001,FormatDate$(Sec, "f"))
  758.  
  759. <:#240,9360><:f,1û╛Æ⌐,>Filledit(1005,FormatTime$(Sec, 3))
  760.  
  761. <:#240,9360><:f,1û╛Æ⌐,>Filledit(8000, GetGlobalArray$("time",1))
  762.  
  763. <:#240,9360><:f,1û╛Æ⌐,>Filledit(8001,GetGlobalArray$("time",2))
  764.  
  765. <:#240,9360><:f,1û╛Æ⌐,>SetDlgCallBack(Hour_Up,"{Mac}!Timeup")
  766.  
  767. <:#240,9360><:f,1û╛Æ⌐,>SetDlgCallBack(Minute_up,"{Mac}!Timeup")
  768.  
  769. <:#240,9360><:f,1û╛Æ⌐,>SetDlgCallBack(Hour_Down,"{Mac}!TimeDown")
  770.  
  771. <:#240,9360><:f,1û╛Æ⌐,>SetDlgCallBack(Minute_Down,"{Mac}!TimeDown")
  772.  
  773. <:#240,9360><:f,1û╛Æ⌐,>
  774.  
  775. <:#240,9360><:f,1û╛Æ⌐,>EnableWindow(Hdlg,0)
  776.  
  777. <:#240,9360><:f,1û╛Æ⌐,>Box=dialogbox(".","Time")
  778.  
  779. <:#240,9360><:f,1û╛Æ⌐,>EnableWindow(Hdlg,1)
  780.  
  781. <:#240,9360><:f,1û╛Æ⌐,>SetFocus(Hdlg)
  782.  
  783. <:#240,9360><:f,1û╛Æ⌐,>If Box<<<;>1
  784.  
  785. <:#240,9360><:f,1û╛Æ⌐,>    Exit Function
  786.  
  787. <:#240,9360><:f,1û╛Æ⌐,>Endif
  788.  
  789. <:#240,9360><:f,1û╛Æ⌐,>SetGlobalArray("time",1,GetDialogField$(8000))
  790.  
  791. <:#240,9360><:f,1û╛Æ⌐,>SetGlobalArray("time",2,GetDialogField$(8001))
  792.  
  793. <:#240,9360><:f,1û╛Æ⌐,>End Function
  794.  
  795. <:#240,9360><:f,1û╛Æ⌐,>
  796.  
  797. @╠º▌╕╝«▌@<:#240,9360><:><:><:f,1û╛Æ⌐,>Function Timeup(hdlg,id,text)
  798.  
  799. <:#240,9360><:f,1û╛Æ⌐,>dllid = DllLoadLib("User", "GetAsyncKeyState", "HH")
  800.  
  801. <:#240,9360><:f,1û╛Æ⌐,>Editbox =8067 - id
  802.  
  803. <:#240,9360><:f,1û╛Æ⌐,>Number=GetDlgItemText(Hdlg,Editbox)
  804.  
  805. <:#240,9360><:f,1û╛Æ⌐,>Number=Number + 1
  806.  
  807. <:#240,9360><:f,1û╛Æ⌐,>if  dllid
  808.  
  809. <:#240,9360><:f,1û╛Æ⌐,>    while (0x8000 & DllCall(dllid, VK_LBUTTON))
  810.  
  811. <:#240,9360><:f,1û╛Æ⌐,>        Number=Number+1
  812.  
  813. <:#240,9360><:f,1û╛Æ⌐,>        if Number <;> 60 
  814.  
  815. <:#240,9360><:f,1û╛Æ⌐,>            Number = 0
  816.  
  817. <:#240,9360><:f,1û╛Æ⌐,>        Endif
  818.  
  819. <:#240,9360><:f,1û╛Æ⌐,>        SetDlgItemText(hdlg, EditBox, Number)
  820.  
  821. <:#240,9360><:f,1û╛Æ⌐,>    wend
  822.  
  823. <:#240,9360><:f,1û╛Æ⌐,>    DllFreeLib(dllid)
  824.  
  825. <:#240,9360><:f,1û╛Æ⌐,>Endif
  826.  
  827. <:#240,9360><:f,1û╛Æ⌐,>if Number <;> 60 
  828.  
  829. <:#240,9360><:f,1û╛Æ⌐,>        Number = 0
  830.  
  831. <:#240,9360><:f,1û╛Æ⌐,>    Endif
  832.  
  833. <:#240,9360><:f,1û╛Æ⌐,>SetDlgItemText(Hdlg,Editbox,Number)
  834.  
  835. <:#240,9360><:f,1û╛Æ⌐,>Call SetTime(Hdlg)
  836.  
  837. <:#240,9360><:f,1û╛Æ⌐,>End Function
  838.  
  839. <:#240,9360><:f,1û╛Æ⌐,>
  840.  
  841. @╠º▌╕╝«▌@<:#240,9360><:><:><:f,1û╛Æ⌐,>Function TimeDown(hdlg,id,text)
  842.  
  843. <:#240,9360><:f,1û╛Æ⌐,>dllid = DllLoadLib("User", "GetAsyncKeyState", "HH")
  844.  
  845. <:#240,9360><:f,1û╛Æ⌐,>Editbox =8057 - id
  846.  
  847. <:#240,9360><:f,1û╛Æ⌐,>Number=GetDlgItemText(Hdlg,Editbox)
  848.  
  849. <:#240,9360><:f,1û╛Æ⌐,>Number=Number - 1
  850.  
  851. <:#240,9360><:f,1û╛Æ⌐,>if  dllid
  852.  
  853. <:#240,9360><:f,1û╛Æ⌐,>    while (0x8000 & DllCall(dllid, VK_LBUTTON))
  854.  
  855. <:#240,9360><:f,1û╛Æ⌐,>        Number=Number - 1
  856.  
  857. <:#240,9360><:f,1û╛Æ⌐,>        if Number << 0 
  858.  
  859. <:#240,9360><:f,1û╛Æ⌐,>            Number = 60
  860.  
  861. <:#240,9360><:f,1û╛Æ⌐,>        Endif
  862.  
  863. <:#240,9360><:f,1û╛Æ⌐,>        SetDlgItemText(hdlg, EditBox, Number)
  864.  
  865. <:#240,9360><:f,1û╛Æ⌐,>    wend
  866.  
  867. <:#240,9360><:f,1û╛Æ⌐,>    DllFreeLib(dllid)
  868.  
  869. <:#240,9360><:f,1û╛Æ⌐,>Endif
  870.  
  871. <:#240,9360><:f,1û╛Æ⌐,>    if Number << 0 
  872.  
  873. <:#240,9360><:f,1û╛Æ⌐,>        Number = 60
  874.  
  875. <:#240,9360><:f,1û╛Æ⌐,>    Endif
  876.  
  877. <:#240,9360><:f,1û╛Æ⌐,>SetDlgItemText(Hdlg,Editbox,Number)
  878.  
  879. <:#240,9360><:f,1û╛Æ⌐,>Call SetTime(Hdlg)
  880.  
  881. <:#240,9360><:f,1û╛Æ⌐,>End Function
  882.  
  883. <:#240,9360><:f,1û╛Æ⌐,>
  884.  
  885. @╠º▌╕╝«▌@<:#240,9360><:><:><:f,1û╛Æ⌐,>Function SetTime(Hdlg)
  886.  
  887. <:#240,9360><:f,1û╛Æ⌐,>Today = Now()
  888.  
  889. <:#240,9360><:f,1û╛Æ⌐,>Sec=(GetDlgItemText(Hdlg,8000) * 3600) + (GetDlgItemText(Hdlg,8001) * 60)
  890.  
  891. <:#240,9360><:f,1û╛Æ⌐,>Sec = Sec + Today
  892.  
  893. <:#240,9360><:f,1û╛Æ⌐,>SetDlgItemText(Hdlg,1000,FormatTime$(Today,3))
  894.  
  895. <:#240,9360><:f,1û╛Æ⌐,>SetDlgItemText(Hdlg,1006,FormatDate$(Today,"f"))
  896.  
  897. <:#240,9360><:f,1û╛Æ⌐,>SetDlgItemText(Hdlg,1001,FormatDate$(Sec, "f"))
  898.  
  899. <:#240,9360><:f,1û╛Æ⌐,>SetDlgItemText(Hdlg,1005,FormatTime$(Sec, 3))
  900.  
  901. <:#240,9360><:f,1û╛Æ⌐,>End Function
  902.  
  903. <:#240,9360><:f,1û╛Æ⌐,>
  904.  
  905. @╠º▌╕╝«▌@<:#240,9360><:><:><:><:><:><:><:f,1û╛Æ⌐,>Function Go()
  906.  
  907. <:#240,9360><:f,1û╛Æ⌐,>HourGlass(on)
  908.  
  909. <:#240,9360><:f,1û╛Æ⌐,>hwnd = FindWindow("AmiProWndA", 0)
  910.  
  911. <:#240,9360><:f,1û╛Æ⌐,>    if not isiconic(hwnd)
  912.  
  913. <:#240,9360><:f,1û╛Æ⌐,>        TitleBarMsg("<:f,1û╛Æ⌐,>Å¡üXé¿æ╥é┐é¡é╛é│éóíê≤ìⁿÆåé┼é╖í")
  914.  
  915. <:#240,9360><:f,1û╛Æ⌐,>    Endif
  916.  
  917. <:#240,9360><:f,1û╛Æ⌐,>StatusBarMsg("ê≤ìⁿÆåé┼é╖.....")
  918.  
  919. <:#240,9360><:f,1û╛Æ⌐,>Total=GetGlobalArray$("Perm",1)
  920.  
  921. <:#240,9360><:f,1û╛Æ⌐,>If GetOpenFilecount() <;>0
  922.  
  923. <:#240,9360><:f,1û╛Æ⌐,>    If FileChanged(0,1)
  924.  
  925. <:#240,9360><:f,1û╛Æ⌐,>        isfileChanged = 1
  926.  
  927. <:#240,9360><:f,1û╛Æ⌐,>    Endif
  928.  
  929. <:#240,9360><:f,1û╛Æ⌐,>Endif
  930.  
  931. <:#240,9360><:f,1û╛Æ⌐,>fc = GetOpenFileCount()
  932.  
  933. <:f,1û╛Æ⌐,>if fc <;> 0
  934.  
  935. <:#240,9360><:f,1û╛Æ⌐,>    dim fnm(fc)
  936.  
  937. <:#240,9360><:f,1û╛Æ⌐,>    GetOpenFileNames(&fnm)
  938.  
  939. <:#240,9360><:f,1û╛Æ⌐,>endif
  940.  
  941. <:#240,9360><:f,1û╛Æ⌐,>For y=2 to Total   
  942.  
  943. <:#240,9360><:f,1û╛Æ⌐,>    AnswerMsgBox(7)
  944.  
  945. <:#240,9360><:f,1û╛Æ⌐,>    Path=StrField$(GetPerm(y),1,"^")
  946.  
  947. <:#240,9360><:f,1û╛Æ⌐,>    Drive=Right$(StrField$(Path,1,":"),1)
  948.  
  949. <:#240,9360><:f,1û╛Æ⌐,>    Direct=Strfield$(Path,2,":")
  950.  
  951. <:#240,9360><:f,1û╛Æ⌐,>    Name=UCase$(StrField$(GetPerm(y),2,"^"))
  952.  
  953. <:#240,9360><:f,1û╛Æ⌐,>    Filename="{Drive}:{Direct}{name}"
  954.  
  955. <:f,1û╛Æ⌐,>    Flag=StrField$(GetPerm(Y),6,"^")
  956.  
  957. <:#240,9360><:f,1û╛Æ⌐,>        If ((Flag & 512) or (Flag & 1024))
  958.  
  959. <:#240,9360><:f,1û╛Æ⌐,>            Else
  960.  
  961. <:#240,9360><:f,1û╛Æ⌐,>                Flag=Flag+1536
  962.  
  963. <:#240,9360><:f,1û╛Æ⌐,>        Endif
  964.  
  965. <:#240,9360><:f,1û╛Æ⌐,>    From=StrField$(GetPerm(Y),4,"^")
  966.  
  967. <:#240,9360><:f,1û╛Æ⌐,>    fin=StrField$(GetPerm(Y),5,"^")
  968.  
  969. <:#240,9360><:f,1û╛Æ⌐,>    Copies=StrField$(GetPerm(Y),3,"^")
  970.  
  971. <:#240,9360><:f,1û╛Æ⌐,>    StatusBarMsg("<:f,1û╛Æ⌐,>{Filename} ê≤ìⁿÆåé┼é╖  ")
  972.  
  973. <:#240,9360><:f,1û╛Æ⌐,>    isopen = 0
  974.  
  975. <:f,1û╛Æ⌐,>    for i = 1 to fc
  976.  
  977. <:f,1û╛Æ⌐,>        if fnm(i) = filename
  978.  
  979. <:f,1û╛Æ⌐,>            isopen = i
  980.  
  981. <:f,1û╛Æ⌐,>            break
  982.  
  983. <:f,1û╛Æ⌐,>        endif
  984.  
  985. <:#240,9360><:f,1û╛Æ⌐,>    next
  986.  
  987. <:#240,9360><:f,1û╛Æ⌐,>    if not isopen
  988.  
  989. <:#240,9360><:f,1û╛Æ⌐,>        If 1 = <:f><:f,1û╛Æ⌐,>fileopen(filename, 1, "Ami Pro")<:f>
  990.  
  991. <:#240,9360><:f,1û╛Æ⌐,>            FilePrint(copies,From,Fin,Flag)
  992.  
  993. <:#240,9360><:f,1û╛Æ⌐,>            FileClose()
  994.  
  995. <:#240,9360><:f,1û╛Æ⌐,>        Endif
  996.  
  997. <:#240,9360><:f,1û╛Æ⌐,>    else
  998.  
  999. <:#240,9360><:f,1û╛Æ⌐,>        AppRestore(Fnm(isopen))
  1000.  
  1001. <:#240,9360><:f,1û╛Æ⌐,>        FilePrint(copies, From, Fin, Flag)
  1002.  
  1003. <:#240,9360><:f,1û╛Æ⌐,>    endif
  1004.  
  1005. <:#240,9360><:f,1û╛Æ⌐,>Next
  1006.  
  1007. <:#240,9360><:f,1û╛Æ⌐,>If GetOpenFilecount()<;>0
  1008.  
  1009. <:#240,9360><:f,1û╛Æ⌐,>    Filechanged(1,1)
  1010.  
  1011. <:#240,9360><:f,1û╛Æ⌐,>Endif
  1012.  
  1013. <:#240,9360><:f,1û╛Æ⌐,>FreeGlobalVar("Time")
  1014.  
  1015. <:#240,9360><:f,1û╛Æ⌐,>FreeGlobalVar("Perm")
  1016.  
  1017. <:#240,9360><:f,1û╛Æ⌐,>TitleBarMsg("")
  1018.  
  1019. <:#240,9360><:f,1û╛Æ⌐,>TitleBarMsg("Ami Pro")
  1020.  
  1021. <:#240,9360><:f,1û╛Æ⌐,>StatusBarMsg("")
  1022.  
  1023. <:#240,9360><:f,1û╛Æ⌐,>HourGlass(off)
  1024.  
  1025. <:#240,9360><:f,1û╛Æ⌐,>End Function
  1026.  
  1027. <:#240,9360><:f,1û╛Æ⌐,>
  1028.  
  1029. <:#240,9360><:f,1û╛Æ⌐,>ChechBoth(Flag)
  1030.  
  1031. <:#240,9360><:f,1û╛Æ⌐,>End Function
  1032.  
  1033. <:#240,9360><:f,1û╛Æ⌐,>
  1034.  
  1035. <:#240,9360><:f,1û╛Æ⌐,>DIALOG select
  1036.  
  1037. <:#240,9360><:f,1û╛Æ⌐,>-2134376448 10 76 28 130 112 "" "" "ê≤ìⁿ╠º▓┘æIæ≡"
  1038.  
  1039. <:#240,9360><:f,1û╛Æ⌐,>FONT 6 "System"
  1040.  
  1041. <:#240,9360><:f,1û╛Æ⌐,>8 16 66 89 9001 1352859659 "listbox" "" 0 
  1042.  
  1043. <:#240,9360><:f,1û╛Æ⌐,>82 77 38 12 60 1342373897 "button" "æªÄ₧" 0 
  1044.  
  1045. <:#240,9360><:f,1û╛Æ⌐,>82 90 27 12 61 1342177289 "button" "îπ" 0 
  1046.  
  1047. <:#240,9360><:f,1û╛Æ⌐,>8 4 68 9 7999 1342308352 "static" "" 0 
  1048.  
  1049. <:#240,9360><:f,1û╛Æ⌐,>18 92 0 0 8001 1350566016 "edit" "" 0 
  1050.  
  1051. <:#240,9360><:f,1û╛Æ⌐,>78 68 46 36 12 1342177287 "button" "ê≤ìⁿ" 0 
  1052.  
  1053. <:#240,9360><:f,1û╛Æ⌐,>84 4 40 14 1 1342373889 "button" "OK" 0 
  1054.  
  1055. <:#240,9360><:f,1û╛Æ⌐,>84 20 40 14 2 1342373888 "button" "╖¼▌╛┘" 0 
  1056.  
  1057. <:#240,9360><:f,1û╛Æ⌐,>84 36 40 14 51 1342373888 "button" "╡╠▀╝«▌..." 0 
  1058.  
  1059. <:#240,9360><:f,1û╛Æ⌐,>84 52 40 14 54 1342373888 "button" "Ä₧ìÅ..." 0 
  1060.  
  1061. <:#240,9360><:f,1û╛Æ⌐,>END DIALOG
  1062.  
  1063. <:#240,9360><:f,1û╛Æ⌐,>
  1064.  
  1065. <:#240,9360><:f,1û╛Æ⌐,>
  1066.  
  1067. <:#240,9360><:f,1û╛Æ⌐,>
  1068.  
  1069. <:#240,9360><:f,1û╛Æ⌐,>
  1070.  
  1071. <:#240,9360><:f,1û╛Æ⌐,>DIALOG Time
  1072.  
  1073. <:#240,9360><:f,1û╛Æ⌐,>-2134376448 15 70 52 180 76 "" "" "ê≤ìⁿÄ₧ìÅÉ▌ÆΦ"
  1074.  
  1075. <:#240,9360><:f,1û╛Æ⌐,>FONT 6 "System"
  1076.  
  1077. <:#240,9360><:f,1û╛Æ⌐,>30 28 14 12 8000 1350631424 "edit" "" 0 
  1078.  
  1079. <:#240,9360><:f,1û╛Æ⌐,>81 28 13 12 8001 1350631424 "edit" "" 0 
  1080.  
  1081. <:#240,9360><:f,1û╛Æ⌐,>137 3 40 14 1 1342242817 "button" "OK" 0 
  1082.  
  1083. <:#240,9360><:f,1û╛Æ⌐,>137 19 40 14 2 1342242816 "button" "╖¼▌╛┘" 0 
  1084.  
  1085. <:#240,9360><:f,1û╛Æ⌐,>94 4 40 9 1000 1342177281 "static" " " 0 
  1086.  
  1087. <:#240,9360><:f,1û╛Æ⌐,>25 17 25 9 1002 1342177280 "static" "Ä₧è╘" 0 
  1088.  
  1089. <:#240,9360><:f,1û╛Æ⌐,>76 18 23 8 1003 1342177280 "static" "ò¬" 0 
  1090.  
  1091. <:#240,9360><:f,1û╛Æ⌐,>20 28 10 12 57 1342177280 "button" "<<" 0 
  1092.  
  1093. <:#240,9360><:f,1û╛Æ⌐,>44 28 11 12 67 1342177280 "button" "<;>" 0 
  1094.  
  1095. <:#240,9360><:f,1û╛Æ⌐,>70 28 11 12 56 1342177280 "button" "<<" 0 
  1096.  
  1097. <:#240,9360><:f,1û╛Æ⌐,>94 28 11 12 66 1342242816 "button" "<;>" 0 
  1098.  
  1099. <:#240,9360><:f,1û╛Æ⌐,>5 4 84 9 1006 1342177281 "static" "" 0 
  1100.  
  1101. <:#240,9360><:f,1û╛Æ⌐,>4 56 84 9 1001 1342177281 "static" "" 0 
  1102.  
  1103. <:#240,9360><:f,1û╛Æ⌐,>93 56 43 9 1005 1342177281 "static" "" 0 
  1104.  
  1105. <:#240,9360><:f,1û╛Æ⌐,>2 44 138 25 10 1342242823 "button" "ê≤ìⁿÄ₧ìÅ" 0 
  1106.  
  1107. <:#240,9360><:f,1û╛Æ⌐,>END DIALOG
  1108.  
  1109. <:#240,9360><:f,1û╛Æ⌐,>
  1110.  
  1111. <:#240,9360><:f,1û╛Æ⌐,>
  1112.  
  1113. <:#240,9360>DIALOG    options
  1114.  
  1115. <:#480,9360>-2134376448    28    39    16    223    132    ""    ""    "╩▐»┴ê≤ìⁿ╡╠▀╝«▌"
  1116.  
  1117. <:#240,9360>FONT    14    "System"
  1118.  
  1119. <:#240,9360>45    16    16    12    8002    1350631552    "edit"    ""    0 
  1120.  
  1121. <:#240,9360>45    28    27    12    60    1342373897    "button"    "æSòö"    0 
  1122.  
  1123. <:#240,9360>45    40    46    12    90    1342177289    "button"    "èJÄn═▀░╝▐:"    0 
  1124.  
  1125. <:#240,9360>117    42    37    8    1001    1342177280    "static"    "ÅIù╣═▀░╝▐:"    0 
  1126.  
  1127. <:#240,9360>93    40    22    12    8000    1350762496    "edit"    ""    0 
  1128.  
  1129. <:#240,9360>155    40    22    12    8001    1350631424    "edit"    ""    0 
  1130.  
  1131. <:#240,9360>60    56    28    12    50    1342373897    "button"    "ù╝ò√"    0 
  1132.  
  1133. <:#240,9360>91    56    44    12    68    1342177289    "button"    "ï⌠Éö═▀░╝▐"    0 
  1134.  
  1135. <:#240,9360>140    56    44    12    69    1342177289    "button"    "è∩Éö═▀░╝▐"    0 
  1136.  
  1137. <:#240,9360>26    4    60    8    1002    1342177280    "static"    ""    0 
  1138.  
  1139. <:#240,9360>10    76    50    12    61    1342373891    "button"    "ïtÅç"    0 
  1140.  
  1141. <:#240,9360>10    88    50    12    62    1342242819    "button"    "îJò╘é╡"    0 
  1142.  
  1143. <:#240,9360>10    100    50    12    63    1342242819    "button"    "─▌╬▐"    0 
  1144.  
  1145. <:#240,9360>10    112    59    12    70    1342242819    "button"    "É}î`ê≤ìⁿé╚é╡"    0 
  1146.  
  1147. <:#240,9360>77    76    68    12    64    1342242819    "button"    "ò╢ÅæÅεò±òté½"    0 
  1148.  
  1149. <:#240,9360>77    88    69    12    65    1342242819    "button"    "ÄwÆΦÆáò[é╔ê≤ìⁿ"    0 
  1150.  
  1151. <:#240,9360>77    100    68    12    66    1342242819    "button"    "╩▀▄░╠¿░┘─▐ìXÉV"    0 
  1152.  
  1153. <:#240,9360>77    112    68    12    67    1342242819    "button"    "╥╙òté½"    0 
  1154.  
  1155. <:#240,9360>6    16    37    8    1000    1342177280    "static"    "ê≤ìⁿòöÉö:"    0 
  1156.  
  1157. <:#240,9360>88    4    54    8    1003    1342177280    "static"    ""    0 
  1158.  
  1159. <:#240,9360>6    4    19    8    1004    1342177280    "static"    "ê≤ìⁿ:"    0 
  1160.  
  1161. <:#240,9360>6    28    36    8    1005    1342177280    "static"    "ê≤ìⁿö═ê═:"    0 
  1162.  
  1163. <:#240,9360>6    68    145    57    33    1342177287    "button"    "ègÆú╡╠▀╝«▌"    0 
  1164.  
  1165. <:#240,9360>5    57    55    8    1006    1342177280    "static"    "ï⌠Éöè∩Éö═▀░╝▐:"    0 
  1166.  
  1167. <:#240,9360>179    4    40    12    1    1342373889    "button"    "OK"    0 
  1168.  
  1169. <:#240,9360>179    20    40    12    2    1342373888    "button"    "╖¼▌╛┘"    0 
  1170.  
  1171. <:#240,9360>179    36    40    12    56    1342373888    "button"    "ăé╠╠º▓┘"    0 
  1172.  
  1173. <:#480,9360>156    86    56    24    1007    1342177280    "static"    "èeâtâ@âCâïé▓é╞é╔âIâvâVâçâôé≡É▌ÆΦé╡é▄é╖"    0 
  1174.  
  1175. <:#240,9360>END DIALOG                            
  1176.  
  1177. >
  1178.  
  1179. [Embedded]
  1180. 00025920
  1181. >
  1182. [macsum] 18
  1183. Multiple 0 0 10 29
  1184. LoadFiles 921 1 13 78
  1185. Options 1538 3 7 110
  1186. SaveSettings 2289 3 9 145
  1187. NextFile 2611 3 11 158
  1188. SetFlag 3289 2 3 184
  1189. SetFirst 3786 0 10 207
  1190. GetFlag 4418 1 4 230
  1191. Numbering 4691 3 1 244
  1192. TempToPerm 4751 0 4 249
  1193. Time 5024 3 7 266
  1194. Timeup 5778 3 4 299
  1195. TimeDown 6175 3 4 321
  1196. SetTime 6574 1 3 343
  1197. Go 6874 0 18 353
  1198. select 8570 0 -1 418
  1199. Time 9104 0 -1 436
  1200. options 9843 0 -1 457
  1201. [macse]
  1202. 14 Multiple
  1203. 0 1317
  1204. 13
  1205. 11 00000100
  1206. 0 3 "NewWaveé┼é═é▒é╠â}âNâìé═ùLî°é┼é═éáéΦé▄é╣é±í"
  1207. 6 0
  1208. 15
  1209. 9
  1210. 0 1050
  1211. 13
  1212. 5 9
  1213. 18 0
  1214. 11 00000208
  1215. 0 3 "âtâ@âCâïé≡éPé┬ê╚ÅπâNâìü[âYé╡é─é⌐éτÄ└ìsé╡é─é¡é╛é│éóüB"
  1216. 6 0
  1217. 15
  1218. 9
  1219. 5 1
  1220. 8 1
  1221. 0 271 "Perm" 200
  1222. 0 272 "Perm" 1 1
  1223. 0 271 "Time" 2
  1224. 0 272 "time" 1 0
  1225. 0 272 "time" 2 0
  1226. 0 802
  1227. 13
  1228. 8 2
  1229. 0 268
  1230. 13
  1231. 8 3
  1232. 0 31 9001 "{3}*.s?m"
  1233. 0 31 60 1
  1234. 0 41 54 "{2}!Time"
  1235. 0 41 51 "{2}!Options"
  1236. 0 26 "." "Select"
  1237. 13
  1238. 8 4
  1239. 6 4
  1240. 5 1
  1241. 18 1
  1242. 11 00000525
  1243. 0 266 "Time"
  1244. 0 266 "Perm"
  1245. 0 266 "Temp"
  1246. 6 0
  1247. 15
  1248. 9
  1249. 0 27 8001
  1250. 13
  1251. 8 5
  1252. 16 Loadfiles "{5}"
  1253. 0 27 60
  1254. 13
  1255. 8 6
  1256. 0 27 61
  1257. 13
  1258. 8 7
  1259. 6 7
  1260. 11 00000884
  1261. 0 273 "time" 1
  1262. 13
  1263. 8 8
  1264. 0 273 "time" 2
  1265. 13
  1266. 8 9
  1267. 6 8
  1268. 5 0
  1269. 18 3
  1270. 6 9
  1271. 5 0
  1272. 18 3
  1273. 1 2
  1274. 11 00000799
  1275. 0 285 "{2}!Go" "{8}:{9}"
  1276. 0 3 "{8}Ä₧è╘{9}ò¬îπé╔ê≤ìⁿé≡èJÄné╡é▄é╖í"
  1277. 10 00000871
  1278. 0 3 "ê≤ìⁿèJÄnÄ₧è╘é¬É▌ÆΦé│éΩé─éóé▄é╣é±í é╖é«é╔ê≤ìⁿé≡èJÄné╡é▄é╖í"
  1279. 16 Go
  1280. 10 00000909
  1281. 6 6
  1282. 11 00000909
  1283. 16 Go
  1284. 6 0
  1285. 15
  1286. 9
  1287. 14 LoadFiles
  1288. 5 1
  1289. 8 2
  1290. 5 9999
  1291. 8 3
  1292. 5 1
  1293. 8 4
  1294. 5 1
  1295. 8 5
  1296. 5 1
  1297. 8 6
  1298. 0 290
  1299. 13
  1300. 8 7
  1301. 0 273 "Perm" 1
  1302. 13
  1303. 8 8
  1304. 6 8
  1305. 21 9 [X]
  1306. 5 2
  1307. 8 10
  1308. 6 8
  1309. 6 10
  1310. 18 2
  1311. 12 00000212
  1312. 10 00000262
  1313. 5 1
  1314. 6 10
  1315. 3 0
  1316. 8 10
  1317. 10 00000134
  1318. 6 10
  1319. 0 273 "Perm" "{10}"
  1320. 13
  1321. 23 9
  1322. 10 00000177
  1323. 5 1
  1324. 11 00000583
  1325. 0 20 "{0}" "{6}" " "
  1326. 13
  1327. 8 11
  1328. 0 14 "{11}"
  1329. 13
  1330. 5 3
  1331. 18 3
  1332. 11 00000557
  1333. 0 1044 &9 "{11}" 2 "^"
  1334. 13
  1335. 8 12
  1336. 6 12
  1337. 5 0
  1338. 18 3
  1339. 11 00000448
  1340. 6 12
  1341. 22 9
  1342. 8 13
  1343. 10 00000484
  1344. 7 "{7}^{11}^{5}^{2}^{3}^{4}"
  1345. 8 13
  1346. 6 6
  1347. 5 1
  1348. 3 0
  1349. 0 272 "perm" [X] "{13}"
  1350. 6 6
  1351. 5 1
  1352. 3 0
  1353. 8 6
  1354. 10 00000570
  1355. 10 00000583
  1356. 10 00000262
  1357. 0 272 "Perm" 1 "{6}"
  1358. 6 1
  1359. 15
  1360. 9
  1361. 14 Options
  1362. 0 42 "{0}" 8001
  1363. 13
  1364. 8 4
  1365. 0 14 "{4}"
  1366. 13
  1367. 5 3
  1368. 18 5
  1369. 11 00000137
  1370. 0 3 "ɵé╔éóé¡é┬é⌐âtâ@âCâïé≡æIæ≡é╡é─é¡é╛é│éóí"
  1371. 6 3
  1372. 15
  1373. 9
  1374. 16 Loadfiles "{4}"
  1375. 0 273 "Perm" 1
  1376. 13
  1377. 8 5
  1378. 0 271 "Temp" "{5}"
  1379. 0 271 "Counter" 1
  1380. 0 264 "Counter" 2
  1381. 5 2
  1382. 8 6
  1383. 6 5
  1384. 6 6
  1385. 18 2
  1386. 12 00000325
  1387. 10 00000393
  1388. 5 1
  1389. 6 6
  1390. 3 0
  1391. 8 6
  1392. 10 00000250
  1393. 0 273 "Perm" "{6}"
  1394. 13
  1395. 8 7
  1396. 0 272 "temp" "{6}" "{7}"
  1397. 10 00000292
  1398. 16 SetFirst
  1399. 0 802
  1400. 13
  1401. 8 8
  1402. 0 31 50 1
  1403. 0 41 8000 "{8}!Numbering"
  1404. 0 41 8001 "{8}!Numbering"
  1405. 0 41 56 "{8}!NextFile"
  1406. 0 41 57 "{8}!SaveSettings"
  1407. 0 284 "User,EnableWindow,AHA" "{0}" 0
  1408. 0 26 "." "Options"
  1409. 13
  1410. 8 9
  1411. 0 284 "User,EnableWindow,AHA" "{0}" 1
  1412. 0 284 "User,SetFocus,HH" "{0}"
  1413. 6 9
  1414. 5 1
  1415. 18 0
  1416. 11 00000722
  1417. 16 TempToPerm
  1418. 0 266 "Counter"
  1419. 6 3
  1420. 15
  1421. 9
  1422. 14 SaveSettings
  1423. 0 265 "Counter"
  1424. 13
  1425. 8 4
  1426. 0 42 "{0}" 8000
  1427. 13
  1428. 8 5
  1429. 0 42 "{0}" 8001
  1430. 13
  1431. 8 6
  1432. 0 42 "{0}" 8002
  1433. 13
  1434. 8 7
  1435. 16 GetFlag "{0}"
  1436. 13
  1437. 8 8
  1438. 0 273 "temp" "{4}"
  1439. 13
  1440. 0 20 [X] 1 "^"
  1441. 13
  1442. 8 9
  1443. 0 273 "temp" "{4}"
  1444. 13
  1445. 0 20 [X] 2 "^"
  1446. 13
  1447. 8 10
  1448. 7 "{9}^{10}^{7}^{5}^{6}^{8}"
  1449. 8 11
  1450. 0 272 "Temp" "{4}" "{11}"
  1451. 6 3
  1452. 15
  1453. 9
  1454. 14 NextFile
  1455. 16 SaveSettings "{0}" "{1}" "{2}"
  1456. 0 265 "counter"
  1457. 13
  1458. 8 4
  1459. 0 273 "Perm" 1
  1460. 13
  1461. 8 5
  1462. 6 4
  1463. 6 5
  1464. 18 5
  1465. 11 00000161
  1466. 6 4
  1467. 5 1
  1468. 3 0
  1469. 8 4
  1470. 10 00000171
  1471. 5 2
  1472. 8 4
  1473. 6 4
  1474. 5 1
  1475. 3 1
  1476. 8 6
  1477. 6 5
  1478. 5 1
  1479. 3 1
  1480. 8 7
  1481. 7 "File {6} of {7}"
  1482. 8 8
  1483. 0 273 "temp" "{4}"
  1484. 13
  1485. 0 20 [X] 2 "^"
  1486. 13
  1487. 0 18 [X]
  1488. 13
  1489. 8 9
  1490. 0 273 "temp" "{4}"
  1491. 13
  1492. 0 20 [X] 6 "^"
  1493. 13
  1494. 8 10
  1495. 0 273 "temp" "{4}"
  1496. 13
  1497. 0 20 [X] 4 "^"
  1498. 13
  1499. 8 11
  1500. 0 273 "temp" "{4}"
  1501. 13
  1502. 0 20 [X] 5 "^"
  1503. 13
  1504. 8 12
  1505. 0 273 "temp" "{4}"
  1506. 13
  1507. 0 20 [X] 3 "^"
  1508. 13
  1509. 8 13
  1510. 16 SetFlag "{0}" "{10}"
  1511. 0 43 "{0}" 1002 "{9}"
  1512. 0 43 "{0}" 8000 "{11}"
  1513. 0 43 "{0}" 8001 "{12}"
  1514. 0 43 "{0}" 8002 "{13}"
  1515. 0 43 "{0}" 1003 "{8}"
  1516. 0 264 "counter" "{4}"
  1517. 6 3
  1518. 15
  1519. 9
  1520. 14 SetFlag
  1521. 5 1
  1522. 8 3
  1523. 5 1
  1524. 8 4
  1525. 5 11
  1526. 6 4
  1527. 18 2
  1528. 12 00000108
  1529. 10 00000300
  1530. 5 1
  1531. 6 4
  1532. 3 0
  1533. 8 4
  1534. 10 00000032
  1535. 6 1
  1536. 6 3
  1537. 25 1
  1538. 11 00000184
  1539. 5 59
  1540. 6 4
  1541. 3 0
  1542. 0 43 "{0}" [X] 1
  1543. 10 00000218
  1544. 5 59
  1545. 6 4
  1546. 3 0
  1547. 0 43 "{0}" [X] 0
  1548. 6 3
  1549. 5 2
  1550. 4 0
  1551. 8 3
  1552. 6 4
  1553. 5 3
  1554. 18 0
  1555. 11 00000287
  1556. 6 3
  1557. 5 2
  1558. 4 0
  1559. 8 3
  1560. 10 00000075
  1561. 0 42 "{0}" 60
  1562. 13
  1563. 5 0
  1564. 18 0
  1565. 11 00000360
  1566. 0 43 "{0}" 90 1
  1567. 0 42 "{0}" 68
  1568. 13
  1569. 5 0
  1570. 18 0
  1571. 0 42 "{0}" 69
  1572. 13
  1573. 5 0
  1574. 18 0
  1575. 1 1
  1576. 11 00000468
  1577. 0 43 "{0}" 50 1
  1578. 10 00000485
  1579. 0 43 "{0}" 50 0
  1580. 6 2
  1581. 15
  1582. 9
  1583. 14 SetFirst
  1584. 0 273 "temp" 2
  1585. 13
  1586. 0 20 [X] 2 "^"
  1587. 13
  1588. 0 18 [X]
  1589. 13
  1590. 8 1
  1591. 0 273 "temp" 2
  1592. 13
  1593. 0 20 [X] 6 "^"
  1594. 13
  1595. 8 2
  1596. 0 273 "temp" 2
  1597. 13
  1598. 0 20 [X] 4 "^"
  1599. 13
  1600. 8 3
  1601. 0 273 "temp" 2
  1602. 13
  1603. 0 20 [X] 5 "^"
  1604. 13
  1605. 8 4
  1606. 0 273 "temp" 2
  1607. 13
  1608. 0 20 [X] 3 "^"
  1609. 13
  1610. 8 5
  1611. 0 273 "Perm" 1
  1612. 13
  1613. 5 1
  1614. 3 1
  1615. 8 6
  1616. 7 "File 1 of {6}"
  1617. 8 7
  1618. 0 31 1002 "{1}"
  1619. 0 31 1003 "{7}"
  1620. 0 31 8000 "{3}"
  1621. 0 31 8001 "{4}"
  1622. 0 31 8002 "{5}"
  1623. 5 1
  1624. 8 8
  1625. 5 1
  1626. 8 9
  1627. 5 11
  1628. 6 9
  1629. 18 2
  1630. 12 00000492
  1631. 10 00000620
  1632. 5 1
  1633. 6 9
  1634. 3 0
  1635. 8 9
  1636. 10 00000416
  1637. 5 59
  1638. 6 9
  1639. 3 0
  1640. 6 2
  1641. 6 8
  1642. 25 1
  1643. 0 31 [X] [X]
  1644. 6 8
  1645. 5 2
  1646. 4 0
  1647. 8 8
  1648. 6 9
  1649. 5 3
  1650. 18 0
  1651. 11 00000607
  1652. 6 8
  1653. 5 2
  1654. 4 0
  1655. 8 8
  1656. 10 00000459
  1657. 6 0
  1658. 15
  1659. 9
  1660. 14 GetFlag
  1661. 5 1
  1662. 8 2
  1663. 5 0
  1664. 8 3
  1665. 5 60
  1666. 8 4
  1667. 5 70
  1668. 6 4
  1669. 18 2
  1670. 12 00000119
  1671. 10 00000249
  1672. 5 1
  1673. 6 4
  1674. 3 0
  1675. 8 4
  1676. 10 00000043
  1677. 6 3
  1678. 0 42 "{0}" "{4}"
  1679. 13
  1680. 6 2
  1681. 4 0
  1682. 3 0
  1683. 8 3
  1684. 6 2
  1685. 5 2
  1686. 4 0
  1687. 8 2
  1688. 6 4
  1689. 5 62
  1690. 18 0
  1691. 11 00000236
  1692. 6 2
  1693. 5 2
  1694. 4 0
  1695. 8 2
  1696. 10 00000086
  1697. 6 3
  1698. 15
  1699. 9
  1700. 6 1
  1701. 15
  1702. 9
  1703. 14 Numbering
  1704. 0 43 "{0}" 60 0
  1705. 0 43 "{0}" 90 1
  1706. 6 3
  1707. 15
  1708. 9
  1709. 14 TempToPerm
  1710. 0 273 "Perm" 1
  1711. 13
  1712. 8 1
  1713. 0 266 "Perm"
  1714. 0 271 "Perm" 200
  1715. 0 272 "Perm" 1 "{1}"
  1716. 5 2
  1717. 8 2
  1718. 6 1
  1719. 6 2
  1720. 18 2
  1721. 12 00000179
  1722. 10 00000247
  1723. 5 1
  1724. 6 2
  1725. 3 0
  1726. 8 2
  1727. 10 00000104
  1728. 0 273 "Temp" "{2}"
  1729. 13
  1730. 8 3
  1731. 0 272 "Perm" "{2}" "{3}"
  1732. 10 00000146
  1733. 0 266 "Temp"
  1734. 6 0
  1735. 15
  1736. 9
  1737. 14 Time
  1738. 0 43 "{0}" 60 0
  1739. 0 43 "{0}" 61 1
  1740. 5 0
  1741. 8 4
  1742. 0 802
  1743. 13
  1744. 8 5
  1745. 0 772
  1746. 13
  1747. 8 6
  1748. 0 773 "{6}" 3
  1749. 13
  1750. 8 3
  1751. 0 770 "{6}" "f"
  1752. 13
  1753. 8 7
  1754. 0 31 1000 "{3}"
  1755. 0 31 1006 "{7}"
  1756. 0 273 "time" 1
  1757. 13
  1758. 5 3600
  1759. 4 0
  1760. 0 273 "time" 2
  1761. 13
  1762. 5 60
  1763. 4 0
  1764. 3 0
  1765. 8 8
  1766. 6 8
  1767. 6 6
  1768. 3 0
  1769. 8 8
  1770. 0 770 "{8}" "f"
  1771. 13
  1772. 0 31 1001 [X]
  1773. 0 773 "{8}" 3
  1774. 13
  1775. 0 31 1005 [X]
  1776. 0 273 "time" 1
  1777. 13
  1778. 0 31 8000 [X]
  1779. 0 273 "time" 2
  1780. 13
  1781. 0 31 8001 [X]
  1782. 0 41 67 "{5}!Timeup"
  1783. 0 41 66 "{5}!Timeup"
  1784. 0 41 57 "{5}!TimeDown"
  1785. 0 41 56 "{5}!TimeDown"
  1786. 0 284 "User,EnableWindow,AHA" "{0}" 0
  1787. 0 26 "." "Time"
  1788. 13
  1789. 8 9
  1790. 0 284 "User,EnableWindow,AHA" "{0}" 1
  1791. 0 284 "User,SetFocus,HH" "{0}"
  1792. 6 9
  1793. 5 1
  1794. 18 1
  1795. 11 00000672
  1796. 6 3
  1797. 15
  1798. 9
  1799. 0 27 8000
  1800. 13
  1801. 0 272 "time" 1 [X]
  1802. 0 27 8001
  1803. 13
  1804. 0 272 "time" 2 [X]
  1805. 6 3
  1806. 15
  1807. 9
  1808. 14 Timeup
  1809. 0 297 "User" "GetAsyncKeyState" "HH"
  1810. 13
  1811. 8 4
  1812. 5 8067
  1813. 6 1
  1814. 3 1
  1815. 8 5
  1816. 0 42 "{0}" "{5}"
  1817. 13
  1818. 8 6
  1819. 6 6
  1820. 5 1
  1821. 3 0
  1822. 8 6
  1823. 6 4
  1824. 11 00000303
  1825. 5 32768
  1826. 0 284 "{4}" 1
  1827. 13
  1828. 25 1
  1829. 11 00000290
  1830. 6 6
  1831. 5 1
  1832. 3 0
  1833. 8 6
  1834. 6 6
  1835. 5 60
  1836. 18 3
  1837. 11 00000253
  1838. 5 0
  1839. 8 6
  1840. 0 43 "{0}" "{5}" "{6}"
  1841. 10 00000146
  1842. 0 298 "{4}"
  1843. 6 6
  1844. 5 60
  1845. 18 3
  1846. 11 00000343
  1847. 5 0
  1848. 8 6
  1849. 0 43 "{0}" "{5}" "{6}"
  1850. 16 SetTime "{0}"
  1851. 6 3
  1852. 15
  1853. 9
  1854. 14 TimeDown
  1855. 0 297 "User" "GetAsyncKeyState" "HH"
  1856. 13
  1857. 8 4
  1858. 5 8057
  1859. 6 1
  1860. 3 1
  1861. 8 5
  1862. 0 42 "{0}" "{5}"
  1863. 13
  1864. 8 6
  1865. 6 6
  1866. 5 1
  1867. 3 1
  1868. 8 6
  1869. 6 4
  1870. 11 00000305
  1871. 5 32768
  1872. 0 284 "{4}" 1
  1873. 13
  1874. 25 1
  1875. 11 00000292
  1876. 6 6
  1877. 5 1
  1878. 3 1
  1879. 8 6
  1880. 6 6
  1881. 5 0
  1882. 18 5
  1883. 11 00000255
  1884. 5 60
  1885. 8 6
  1886. 0 43 "{0}" "{5}" "{6}"
  1887. 10 00000148
  1888. 0 298 "{4}"
  1889. 6 6
  1890. 5 0
  1891. 18 5
  1892. 11 00000345
  1893. 5 60
  1894. 8 6
  1895. 0 43 "{0}" "{5}" "{6}"
  1896. 16 SetTime "{0}"
  1897. 6 3
  1898. 15
  1899. 9
  1900. 14 SetTime
  1901. 0 772
  1902. 13
  1903. 8 2
  1904. 0 42 "{0}" 8000
  1905. 13
  1906. 5 3600
  1907. 4 0
  1908. 0 42 "{0}" 8001
  1909. 13
  1910. 5 60
  1911. 4 0
  1912. 3 0
  1913. 8 3
  1914. 6 3
  1915. 6 2
  1916. 3 0
  1917. 8 3
  1918. 0 773 "{2}" 3
  1919. 13
  1920. 0 43 "{0}" 1000 [X]
  1921. 0 770 "{2}" "f"
  1922. 13
  1923. 0 43 "{0}" 1006 [X]
  1924. 0 770 "{3}" "f"
  1925. 13
  1926. 0 43 "{0}" 1001 [X]
  1927. 0 773 "{3}" 3
  1928. 13
  1929. 0 43 "{0}" 1005 [X]
  1930. 6 1
  1931. 15
  1932. 9
  1933. 14 Go
  1934. 0 296 1
  1935. 0 284 "user,FindWindow,HCC" "AmiProWndA" 0
  1936. 13
  1937. 8 1
  1938. 0 284 "user,isiconic,HA" "{1}"
  1939. 13
  1940. 1 3
  1941. 11 00000228
  1942. 0 284 "user,GetActiveWindow,H"
  1943. 13
  1944. 0 284 "user,SetWindowText,IHC" [X] "Å¡üXé¿æ╥é┐é¡é╛é│éóíê≤ìⁿÆåé┼é╖í"
  1945. 0 789 "ê≤ìⁿÆåé┼é╖....."
  1946. 0 273 "Perm" 1
  1947. 13
  1948. 8 2
  1949. 0 1050
  1950. 13
  1951. 5 0
  1952. 18 3
  1953. 11 00000351
  1954. 0 34 0 1
  1955. 13
  1956. 11 00000351
  1957. 5 1
  1958. 8 3
  1959. 0 1050
  1960. 13
  1961. 8 4
  1962. 6 4
  1963. 5 0
  1964. 18 3
  1965. 11 00000423
  1966. 6 4
  1967. 21 5 [X]
  1968. 0 1051 &5
  1969. 5 2
  1970. 8 6
  1971. 6 2
  1972. 6 6
  1973. 18 2
  1974. 12 00000508
  1975. 10 00001434
  1976. 5 1
  1977. 6 6
  1978. 3 0
  1979. 8 6
  1980. 10 00000433
  1981. 0 291 7
  1982. 0 273 "perm" "{6}"
  1983. 13
  1984. 0 20 [X] 1 "^"
  1985. 13
  1986. 8 7
  1987. 0 20 "{7}" 1 ":"
  1988. 13
  1989. 0 807 [X] 1
  1990. 13
  1991. 8 8
  1992. 0 20 "{7}" 2 ":"
  1993. 13
  1994. 8 9
  1995. 0 273 "perm" "{6}"
  1996. 13
  1997. 0 20 [X] 2 "^"
  1998. 13
  1999. 0 18 [X]
  2000. 13
  2001. 8 10
  2002. 7 "{8}:{9}{10}"
  2003. 8 11
  2004. 0 273 "perm" "{6}"
  2005. 13
  2006. 0 20 [X] 6 "^"
  2007. 13
  2008. 8 12
  2009. 6 12
  2010. 5 512
  2011. 25 1
  2012. 6 12
  2013. 5 1024
  2014. 25 1
  2015. 1 2
  2016. 11 00000844
  2017. 10 00000869
  2018. 6 12
  2019. 5 1536
  2020. 3 0
  2021. 8 12
  2022. 0 273 "perm" "{6}"
  2023. 13
  2024. 0 20 [X] 4 "^"
  2025. 13
  2026. 8 13
  2027. 0 273 "perm" "{6}"
  2028. 13
  2029. 0 20 [X] 5 "^"
  2030. 13
  2031. 8 14
  2032. 0 273 "perm" "{6}"
  2033. 13
  2034. 0 20 [X] 3 "^"
  2035. 13
  2036. 8 15
  2037. 0 789 "{11} ê≤ìⁿÆåé┼é╖  "
  2038. 5 0
  2039. 8 16
  2040. 5 1
  2041. 8 17
  2042. 6 4
  2043. 6 17
  2044. 18 2
  2045. 12 00001146
  2046. 10 00001221
  2047. 5 1
  2048. 6 17
  2049. 3 0
  2050. 8 17
  2051. 10 00001068
  2052. 6 17
  2053. 22 5
  2054. 6 11
  2055. 18 0
  2056. 11 00001208
  2057. 6 17
  2058. 8 16
  2059. 10 00001221
  2060. 10 00001111
  2061. 6 16
  2062. 1 3
  2063. 11 00001360
  2064. 5 1
  2065. 2 102 1 "{11}" 1 "Ami Pro"
  2066. 13
  2067. 18 0
  2068. 11 00001347
  2069. 2 111 1 "{15}" "{13}" "{14}" "{12}"
  2070. 2 147 1
  2071. 10 00001421
  2072. 6 16
  2073. 22 5
  2074. 0 1031 [X]
  2075. 2 111 1 "{15}" "{13}" "{14}" "{12}"
  2076. 10 00000475
  2077. 0 1050
  2078. 13
  2079. 5 0
  2080. 18 3
  2081. 11 00001480
  2082. 0 34 1 1
  2083. 0 266 "Time"
  2084. 0 266 "Perm"
  2085. 0 284 "user,GetActiveWindow,H"
  2086. 13
  2087. 0 284 "user,SetWindowText,IHC" [X] ""
  2088. 0 284 "user,GetActiveWindow,H"
  2089. 13
  2090. 0 284 "user,SetWindowText,IHC" [X] "Ami Pro"
  2091. 0 789 ""
  2092. 0 296 0
  2093. 6 0
  2094. 15
  2095. 9
  2096. DIALOG select
  2097. -2134376448 10 76 28 130 112 "" "" "ê≤ìⁿ╠º▓┘æIæ≡" 
  2098. FONT 6 "System" 
  2099. 8 16 66 89 9001 1352859659 "listbox" "" 0 
  2100. 82 77 38 12 60 1342373897 "button" "æªÄ₧" 0 
  2101. 82 90 27 12 61 1342177289 "button" "îπ" 0 
  2102. 8 4 68 9 7999 1342308352 "static" "" 0 
  2103. 18 92 0 0 8001 1350566016 "edit" "" 0 
  2104. 78 68 46 36 12 1342177287 "button" "ê≤ìⁿ" 0 
  2105. 84 4 40 14 1 1342373889 "button" "OK" 0 
  2106. 84 20 40 14 2 1342373888 "button" "╖¼▌╛┘" 0 
  2107. 84 36 40 14 51 1342373888 "button" "╡╠▀╝«▌..." 0 
  2108. 84 52 40 14 54 1342373888 "button" "Ä₧ìÅ..." 0 
  2109. DIALOG Time
  2110. -2134376448 15 70 52 180 76 "" "" "ê≤ìⁿÄ₧ìÅÉ▌ÆΦ" 
  2111. FONT 6 "System" 
  2112. 30 28 14 12 8000 1350631424 "edit" "" 0 
  2113. 81 28 13 12 8001 1350631424 "edit" "" 0 
  2114. 137 3 40 14 1 1342242817 "button" "OK" 0 
  2115. 137 19 40 14 2 1342242816 "button" "╖¼▌╛┘" 0 
  2116. 94 4 40 9 1000 1342177281 "static" " " 0 
  2117. 25 17 25 9 1002 1342177280 "static" "Ä₧è╘" 0 
  2118. 76 18 23 8 1003 1342177280 "static" "ò¬" 0 
  2119. 20 28 10 12 57 1342177280 "button" "<" 0 
  2120. 44 28 11 12 67 1342177280 "button" ">" 0 
  2121. 70 28 11 12 56 1342177280 "button" "<" 0 
  2122. 94 28 11 12 66 1342242816 "button" ">" 0 
  2123. 5 4 84 9 1006 1342177281 "static" "" 0 
  2124. 4 56 84 9 1001 1342177281 "static" "" 0 
  2125. 93 56 43 9 1005 1342177281 "static" "" 0 
  2126. 2 44 138 25 10 1342242823 "button" "ê≤ìⁿÄ₧ìÅ" 0 
  2127. DIALOG options
  2128. -2134376448 28 39 16 223 132 "" "" "╩▐»┴ê≤ìⁿ╡╠▀╝«▌" 
  2129. FONT 14 "System" 
  2130. 45 16 16 12 8002 1350631552 "edit" "" 0 
  2131. 45 28 27 12 60 1342373897 "button" "æSòö" 0 
  2132. 45 40 46 12 90 1342177289 "button" "èJÄn═▀░╝▐:" 0 
  2133. 117 42 37 8 1001 1342177280 "static" "ÅIù╣═▀░╝▐:" 0 
  2134. 93 40 22 12 8000 1350762496 "edit" "" 0 
  2135. 155 40 22 12 8001 1350631424 "edit" "" 0 
  2136. 60 56 28 12 50 1342373897 "button" "ù╝ò√" 0 
  2137. 91 56 44 12 68 1342177289 "button" "ï⌠Éö═▀░╝▐" 0 
  2138. 140 56 44 12 69 1342177289 "button" "è∩Éö═▀░╝▐" 0 
  2139. 26 4 60 8 1002 1342177280 "static" "" 0 
  2140. 10 76 50 12 61 1342373891 "button" "ïtÅç" 0 
  2141. 10 88 50 12 62 1342242819 "button" "îJò╘é╡" 0 
  2142. 10 100 50 12 63 1342242819 "button" "─▌╬▐" 0 
  2143. 10 112 59 12 70 1342242819 "button" "É}î`ê≤ìⁿé╚é╡" 0 
  2144. 77 76 68 12 64 1342242819 "button" "ò╢ÅæÅεò±òté½" 0 
  2145. 77 88 69 12 65 1342242819 "button" "ÄwÆΦÆáò[é╔ê≤ìⁿ" 0 
  2146. 77 100 68 12 66 1342242819 "button" "╩▀▄░╠¿░┘─▐ìXÉV" 0 
  2147. 77 112 68 12 67 1342242819 "button" "╥╙òté½" 0 
  2148. 6 16 37 8 1000 1342177280 "static" "ê≤ìⁿòöÉö:" 0 
  2149. 88 4 54 8 1003 1342177280 "static" "" 0 
  2150. 6 4 19 8 1004 1342177280 "static" "ê≤ìⁿ:" 0 
  2151. 6 28 36 8 1005 1342177280 "static" "ê≤ìⁿö═ê═:" 0 
  2152. 6 68 145 57 33 1342177287 "button" "ègÆú╡╠▀╝«▌" 0 
  2153. 5 57 55 8 1006 1342177280 "static" "ï⌠Éöè∩Éö═▀░╝▐:" 0 
  2154. 179 4 40 12 1 1342373889 "button" "OK" 0 
  2155. 179 20 40 12 2 1342373888 "button" "╖¼▌╛┘" 0 
  2156. 179 36 40 12 56 1342373888 "button" "ăé╠╠º▓┘" 0 
  2157. 156 86 56 24 1007 1342177280 "static" "èeâtâ@âCâïé▓é╞é╔âIâvâVâçâôé≡É▌ÆΦé╡é▄é╖" 0 
  2158. 00025945
  2159.